5 POKE53281,.:POKE53280,.:PRINT"[147]" 8 DV=PEEK(186):IFDV<8THENDV=8 10 GOSUB60000 105 SYS57812"PSB FONT",DV,0:POKE780,0:POKE781,0:POKE782,48:SYS65493 107 SYS57812"PSB FONT",DV,0:POKE780,0:POKE781,0:POKE782,56:SYS65493 110 SYS57812"FPRINT.O",DV,0:POKE780,0:POKE781,0:POKE782,126:SYS65493 200 POKE43,1:POKE44,66:POKE16896,0 210 PRINT"[144]LOAD"CHR$(34)"FONT PRINTER"CHR$(34)","DV 220 PRINT"RUN" 230 POKE631,13:POKE632,13:POKE198,2 240 NEW 10000 OPEN15,8,15,"S0:FPRINT BOOT":CLOSE15:SAVE"0:FPRINT BOOT",8:END 60000 PRINT"[147]":Z$=" [152] ":POKE214,10:PRINT 60010 PRINT" [155][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]":FORI=0TO11:PRINTZ$:NEXT 60020 PRINT" [151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][152]" 60030 Z$(0)="[198] [207] [206] [212] [208] [210] [201] [206] [212] [197] [210]":Z$(1)="BY [194]ARBARA [211]CHULAK" 60040 Z$(2)="[214]1.0 ([195]) 1992 BY [211]OFTDISK, [201]NC."+CHR$(13) 60050 Z$(3)="[212]HIS PROGRAM IS THE COPYRIGHTED WORK 60060 Z$(4)[178]"OF (null)(null)ASC(null)STR$RIGHT$(null)(null) (null)(null)PEEK(null)RIGHT$(null)LEFT$RIGHT$(null)CHR$. RIGHT$T IS NOT" 60070 Z$(5)[178]"SHAREWARE OR IN THE PUBLIC DOMAIN." 60080 Z$(6)[178]"(null)EPORT ILLEGAL DISTRIBUTION OF":Z$(7)[178]"THIS PROGRAM BY CALLING" 60090 Z$(8)[178]"1-800-831-2694 OR 1-318-221-8718.":[151]214,12:[153] 60100 [129]I[178]0[164]8:[153][163]20[171]([195](Z$(I))[173]2))""Z$(I):[130]:[142]